package com.example.yls.demoa;

import android.content.Context;
import android.graphics.Bitmap;
import android.graphics.BitmapFactory;
import android.graphics.Canvas;
import android.graphics.Paint;
import android.graphics.Point;
import android.support.annotation.Nullable;
import android.util.AttributeSet;
import android.util.Log;
import android.view.MotionEvent;
import android.view.View;
import android.widget.Toast;

import java.util.ArrayList;
import java.util.List;

/**
 * Created by yls on 2018/6/13.
 */

public class WuziqiPanel extends View {

    private int mPanelWidth;
    private float mLineHeight;
    private int MAX_LINE=10;

    private int MAX_COUNT_IN_LINE=5;
    private Paint paint=new Paint();

    private Bitmap mWhitePiece;
    private Bitmap mBlackPiece;

    private float ratioPieceOfLineHeight=3*1.0f/4;

    //白棋先走，当前轮到白棋
    private boolean mIsWhite=true;
    private List<Point> mWhiteArray=new ArrayList<>();
    private List<Point> mBlackArray=new ArrayList<>();

    private boolean mIsGameOver;
    private boolean mIsWhiteWinner;
    public WuziqiPanel(Context context, @Nullable AttributeSet attrs) {
        super(context, attrs);
    setBackgroundColor(0x44ff0000);
    init();

    }

    private void init() {
        paint.setColor(0x88000000);
        paint.setAntiAlias(true);
        paint.setDither(true);
        paint.setStyle(Paint.Style.STROKE);

        mWhitePiece= BitmapFactory.decodeResource(getResources(),R.drawable.stone_w2);
        mBlackPiece= BitmapFactory.decodeResource(getResources(),R.drawable.stone_b1);
    }

    @Override
    protected void onMeasure(int widthMeasureSpec, int heightMeasureSpec) {

        int widthSize=MeasureSpec.getSize(widthMeasureSpec);
        int widthMode=MeasureSpec.getMode(widthMeasureSpec);

       int heightSize=MeasureSpec.getSize(heightMeasureSpec);
        int heightMode=MeasureSpec.getMode(heightMeasureSpec);

        int width=Math.min(widthSize,heightSize);
        if(widthMode==MeasureSpec.UNSPECIFIED){
            width=heightSize;
        }
        else if(heightMode==MeasureSpec.UNSPECIFIED){
            width=widthSize;
        }
        setMeasuredDimension(width,width);
        Log.e("WuziqiPanel","onMeasure w="+widthSize+"h="+heightSize);
    }

    @Override
    protected void onSizeChanged(int w, int h, int oldw, int oldh) {
        super.onSizeChanged(w, h, oldw, oldh);
        Log.e("WuziqiPanel","onSizeChanged w="+w+"h="+h);
        mPanelWidth=w;
        mLineHeight=mPanelWidth*1.0f/MAX_LINE;

        int pieceWidth= (int) (mLineHeight*ratioPieceOfLineHeight);
        mWhitePiece=Bitmap.createScaledBitmap(mWhitePiece,pieceWidth,pieceWidth,false);
        mBlackPiece=Bitmap.createScaledBitmap(mBlackPiece,pieceWidth,pieceWidth,false);
    }

    @Override
    public boolean onTouchEvent(MotionEvent event) {

        if(mIsGameOver) return  false;
        int action=event.getAction();
        if(action==MotionEvent.ACTION_DOWN){

            int x= (int) event.getX();
            int y= (int) event.getY();

            Point point=getValidPoint(x,y);

            if(mWhiteArray.contains(point) || mBlackArray.contains(point)){

                return false;
            }

            if(mIsWhite){
                mWhiteArray.add(point);
            }
            else {
                mBlackArray.add(point);
            }
            invalidate();
            mIsWhite=!mIsWhite;
            return true;
        }
        return true;
    }

    private Point getValidPoint(int x, int y) {
        return new Point((int)(x/mLineHeight),(int) (y/mLineHeight));
    }

    @Override
    protected void onDraw(Canvas canvas) {
        super.onDraw(canvas);
        drawBOARD(canvas);
        drawPieces(canvas);
        checkGameOver();
    }

    private void checkGameOver() {
       boolean whiteWin= checkFiveInLine(mWhiteArray);
        boolean blackWin= checkFiveInLine(mBlackArray);

        if(whiteWin || blackWin){
            mIsGameOver=true;
            mIsWhiteWinner=whiteWin;

            String text=mIsWhiteWinner?"白棋胜利" : "黑棋胜利";
            Toast.makeText(getContext(),text,Toast.LENGTH_SHORT).show();
        }
    }

    private boolean checkFiveInLine(List<Point> points) {
        for(Point point: points){
            int x=point.x;
            int y=point.y;

           boolean win= checkHorizontal(x,y,points);
           if(win) return  true;
           win=checkVertical(x,y,points);
            if(win) return  true;
            win=checkLeftDiagonal(x,y,points);
            if(win) return  true;
            win=checkRightDiagonal(x,y,points);
            if(win) return  true;

        }

        return false;
    }
  //判断x,y位置棋子，是否横向有相连的棋子
    private boolean checkHorizontal(int x, int y, List<Point> points) {

        //左
        int count=1;
        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x-i,y))){
                count++;
            }
            else {
                break;
            }
        }

        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x+i,y))){
                count++;
            }
            else {
                break;
            }
        }
        if(count==MAX_COUNT_IN_LINE)
            return true;
        return false;
    }


    private boolean checkVertical(int x, int y, List<Point> points) {

        int count=1;
        //上
        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x,y-i))){
                count++;
            }
            else {
                break;
            }
        }

        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x,y+i))){
                count++;
            }
            else {
                break;
            }
        }
        if(count==MAX_COUNT_IN_LINE)
            return true;
        return false;
    }
    private boolean checkLeftDiagonal(int x, int y, List<Point> points) {

        int count=1;
        //上
        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x-i,y+i))){
                count++;
            }
            else {
                break;
            }
        }

        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x+i,y+i))){
                count++;
            }
            else {
                break;
            }
        }
        if(count==MAX_COUNT_IN_LINE)
            return true;
        return false;
    }
    private boolean checkRightDiagonal(int x, int y, List<Point> points) {

        int count=1;
        //
        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x-i,y-i))){
                count++;
            }
            else {
                break;
            }
        }

        for(int i=1;i<MAX_COUNT_IN_LINE;i++){
            if(points.contains(new Point(x+i,y+i))){
                count++;
            }
            else {
                break;
            }
        }
        if(count==MAX_COUNT_IN_LINE)
            return true;
        return false;
    }
    private void drawPieces(Canvas canvas) {

        for(int i=0,n=mWhiteArray.size();i<n;i++){
     Point whitePoint=mWhiteArray.get(i);
     canvas.drawBitmap(mWhitePiece,
             (whitePoint.x+(1-ratioPieceOfLineHeight)/2)*mLineHeight,
             (whitePoint.y+(1-ratioPieceOfLineHeight)/2)*mLineHeight,null);
        }

        for(int i=0,n=mBlackArray.size();i<n;i++){
            Point blackPoint=mBlackArray.get(i);
            canvas.drawBitmap(mBlackPiece,
                    (blackPoint.x+(1-ratioPieceOfLineHeight)/2)*mLineHeight,
                    (blackPoint.y+(1-ratioPieceOfLineHeight)/2)*mLineHeight,null);
        }
    }

    private void drawBOARD(Canvas canvas) {
        int w=mPanelWidth;
        float lineHeight=mLineHeight;
        for(int i=0;i<MAX_LINE;i++){
            int startX= (int) (lineHeight/2);
            int endX= (int) (w-lineHeight/2);

            int y= (int) ((0.5+i)*lineHeight);
            canvas.drawLine(startX,y,endX,y,paint);
        canvas.drawLine(y,startX,y,endX,paint);
        }
    }
}
